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REVISION NOTICE 

This publication replaces previous descriptions of "Matrix Inversion 2." 
Description? have been clarified and program references changed to cur- 
rent designations. 



FUNCTION 

The "Matrix Inversion 2" enables the user to replace the elements of a 
square matrix with the elements of its inverse. Matrices of any rank 
greater than 1 will be accommodated. Program Dl-129.0 is entered and 
left in machine language, but it uses the Floating Point Interpretive 
System 1, program Hl-24.0 for all calculations. 



INPUT 

The elements of a square matrix are stored in consecutive locations on 
the drum, beginning in Mq. The elements must be in floating point form. 



OUTPUT 

The elements of the inverse matrix are stored in consecutive locations, 
beginning in M Q , in floating point form. 



CALLING SEQUENCE 



Location 


Order 




Address 


a - 1 


E 




0000 


a 


R 




L + 0014 


a + 1 


U 




L o 


a + 2 


(n at 


15) 


M 


a + 3 


etc. 







SC 0046 



1 Of 2 



Printed in USA 



MATRIX INVERSION 2 



CALLING SEQUENCE (Cont.) 

The E0000 order in (a - 1) is required only if the previous instructions 
are interpreted by program Hl-24.0. In (a + 2), n is the rank of the 
matrix. 



TIME 



-3 

Approximately 1.08 n seconds are required for the inversion. 



STORAGE 

Two tracks are required for instructions and constants. No temporary 
storage is used except that required by program Hl-24.0. Although only 
n 2 sectors are required for the matrix elements, the routine requires 
v? + n sectors beginning in M Q . 



NOTES 



When reading in the "Matrix Inversion 1," it is necessary to supply, 
as the last word read in, the first location of program Hl-24.0. 

The floating point instructions used by this routine are the following: 
Bxxxx, Dxxxx, Mxxxx, Hxxxx, Cxxxx, Axxxx, Sxxxx, U0000, and E0000. 
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FUNCTION : 



To replace the elements of a square matrix with the elements of its inverse 
Matrices of any rank greater than one will be accomodated. The routine is entered 
and left in machine language, but it uses the floating point routine, program 2U.0, 
for all calculations. 



INPUT: 
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0000 


R 
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L Q + OOli 



The elements of a square matrix in consecutive locations on the drum, beginning 
in M . The elements must be in floating point form. 

OUTPUT : 

The elements of the inverse matrix in consecutive locations, beginning in M Q , 
in floating point form. 

CALLING SEQUENCE : 

Location Order Address 

a - 1 

a 

a + 1 

a + 2 (n at 15) Mq <— Code Word 

a + 3 etc. 

The EO0O0 order in a - 1 is required only if the previous instructions are 
interpreted by program 2^.0. In a + 2, n is the rank of the matrix. 

TIME: Approximately 1.08 n^ seconds. 

STORAGE : 

Two tracks are required for instructions and constants. No temporary storage 
is used except that required by program 2U.0. Although only n? sectors are required 
for the matrix elements, the routine requires n 2 + n sectors beginning in M Q . 

NOTES : 

When reading in the matrix inversion routine, it is necessary to supply as the 
last word read in the first location of program 2i*.0. The floating point instructor 
used by this routine are the following: Bxxxx, Dxxxx, Mxxxx, Hxxxx, Cxxxx, Axxxx, 
Sxxxx, U0000, and E0O0O. 



Job No._ 



.Prog. No_ 



LGP-30 CODING SHEET 
2 ?• O Prep, by ^, Q JfgLT 



Paqe_ 



Ck'd. by. 



.Date 



Z__o,_£_ 



Problem. 



/^A-r^/'y /a/p£/?S/4*' 



.Track. 



Program Input 
Codes 


a 



07 


Location 


Instruction 
Op. Address i 


* Contents of 
o Address 


Notes 


1 


/ 


59 
















/ 


















O.0.°.o 


__ B^/L^iL 


, /c /^/? /^ 


>0/Z4-*7 J</,0 























1 




. y\c.o&J 




\ 

























2 




. .Vi0.0.63 





























, 3 




■■■ /■ t 


53 


I 

























4 




X\0./.5# 




1 

























5 




... jy | ir i.i 




{ C0#A-£CT 7b 

























6 










\ p/zcfr/?/)** J4Z? 

























7 






y^o./ .2.2 


5? 


\ 

























8 






'y\o./.2.3 




\ 

























9 






y x o././4 


























1 









V\a u.6 




1 






















1 


1 






y. , | 

gvO.OJM 


53 


\ 






















1 


2 








/(?>2? 


V Fix Ex/T 






















1 


3 






. Y\OJS.€ 


£x/r 


l 






















1 


4 






'£fcoc$ 


CoJ>& it/a^z 


\ 






















1 


5 






y\o.o.ss > 


53 


\ 






















1 


6 






'HfiJ6Z ' 


/ <2> /V 
























1 


7 






.rt\a/.¥f 


V 
























1 


8 






s\e.io$ . 


/ <&J><f 


/ 






















1 


9 






Aa«. 


53 C0#/yt£* 


/ 






















2 









A\OJ.3# , 


3®21 


/ 






















2 


I 






J+\0JJ>J 


//+* 
























2 


2 






A\*/M1 . 


A/-/ 


| '/ ' rsiT/Jl JZ/ir/c,< 






















2 


3 






A a /.so > 


53 /<£-? 


\ 






















2 


4 






H\oj.c1 . 


/W_ / 
























2 


5 






Af.oJS . 


Mo 


\ 






















2 


6 






A\oj&2 • 


/<££<? 


' 






















2 


7 






vjifl //?> • 


53 
























2 


8 






V,* /.^y . 


























2 


9 






A\0J.4.<9 • 


M-/ 


/ 






















3 









y\0.o.$<o , 




/ 








1 . 










. j i 


3 ( 


1 




y\#. /.*f • 


53 


/ 



Conditional Stop Code 



Carriage Return 



Royal M c Bee Corporation 



Jot No.. 



-Prog. No*_i 



n LGP-30 CODING SHEET 

* '/■ O Pron . hv £7C //PA-21 



Page. 



^-ofj^ 



Problem. 



Prep, by 



-Ck'd. by. 



.Date 



g-zO^jy 



-Track. 





Program Input 
Codes 


a 

2 Location 

w 


Instruction 
Op. Address 


§• Contents of 
fi Address 


Notes 




1 


/ 












< X 






O.O. 3.2 


. . tffcoop* 


• ) 








3 3 


, . u\(o.o.od) 


, \-> P/?o&. £*,', o 






3 4 


. . fi\dJSJ 


t?S/f 








3 5 


. . D^o.0 6 0) 


< T^ftn 








3 6 


, . tfjbpoo. 


' Ha/ "^//V 








3 7 


, :A.U\d/).oP 


" / ■ ■ 








. 3 . 8 


, x.^o.o.oo 










3 9 


, . P>\o.63S 


. 7i M* 








,4,0 


A\c./.o$ 


, / (s>z<j 








4 1 


. . .y\#./ .36* 










, 4 , 2 


, . A\OJ4!7 


/Y?-l 








4 | 3 


. . VpY.S.7 


XI 




i 1 „ 




, 4 4 


— ■ ' r — r — u — ■- — 


M(n>+»* + 


/•-/) 


1 




t 4 ■ 5 


J 1 1 J-..-J — 1- ' / — 


-> /Vext 7 


s/f/*/, fr/?sr &>u) 


1 




4 6 


1 


Mo I'M 




i 




4 7 


. . V\a0.63 > 


53 




1 




4 8 




s(Aio t-^ : 


) 


1 

j 




4 9 


, , T\o,6&.( 


->/V^xr- ^ 


ou) 


1 




5 


. . &\oJ3& < 


#//?<7 tV*0 




! 

s 
1 — ' 




5 1 


. , yjtf./^f - 


5? 




1 

! 




5 2 


. . '$\o./.v.t > 


// 




1 




5 3 


. , >J\6>,/JP • 










5 4 


1 r \ ' 


#<>fa -^/v 3 ) 




| 




5 5 


. . ff./.69 > 


^-^A-^^r 7; 


*#M f IA^>T /?<r,uJ 






5 6 


. . A\a /.?,?, 


Q,OOAsT£/Z 








5 7 


. . Sf./jOg > 


/ <& 29 








5 8 


. . Jty&od,, 


-5* t:X/7" 








5 9 


. . C.f./.¥.1 < 


JQO &" A/T^r. 


? 






6 


. . .uf.o.3^ > 


-^ Rbp^at 








6 I 


, . Aleppo). 


> 


.- 






6 2 


. . Olo.ooq) , 


5 -t ^.o 






uLi:. 


6 3 


..... 3WoOf} A 


El 5/ 








' Conditional Stop Code IcSI Carriage Retui 


n 



Royal M?Bee Corporation 



Job No_ 



.Prog. No. 



LGP-30 CODING SHEET 

/ZH£_ZL_Ck'd. by. 



^- ! ' '-■ Prep. by_t= = 



Poq« , jf o«4- 



rw- S3 -/J~S%- 



Proble 














/K*. 


rx 


n 


f 


/y^/?s/^^ 


TtnrV 




Program Input 

Codes 


a 
o 

5 


Location 


Instruction j 
Op. Address u 


k Contents of 
; Address 


Notes 


1 


i 


53 






























j£/.°.° 


. .t.do.oAv > 





























i 


. J.iACQ.0 . 





























2 


__i in i ■ | 1 . i i 


/% +/**> 



























3 


. v\ojJ6> 


X 



























4 




. fi\#.a&3 




i 

i 

























5 




JAA/.VJ 


2)£LAy 


1 

























6 






sYaaoS: 




S(A?oi-«' z ) 1 

























7 


L 




r s 
. 1 . . . J 


X 


A/* -1 

























8 






x.Zf.&.ct 




J <& 2f 

























9 






rYc.o.o.o, 


/f/r +/, / 
























I 









dfaaool 


A*, i 
























1 


1 






fi\0J.rt 


K ' 
























1 


2 






A\a;>o$ 


/<£>^9 
























1 


3 






AJ\6.0.5J 


-^ J>o /t A/t 


>r//^# 






















1 


4 






J?{0,Ofi$) 


i 1 
























1 


5 






jjfoo.op) , 


53) ->.?$<<? 
























1 


6 




. Mfo.o.co) 


A» +/> /'- f 
























1 


7 




. A'(o.o.ojd) 


//// 
























1 


8 




uYo.oeo) 


A; -4/-t 
























1 


9 






x.£\o.ao.e 


"A 
























2 









jj^./.3.0 


D£t*y 
























2 


I 






V^./Jf 


























2 


2 






.tifa 00) 


























2 


3 






.t/fce.ce) 


53 ^ ^.^ 
























2 


4 






Hfo.o.op) 


/?• w > ^ 
























2 


5 






a fao.oo) 


A;-/,/v 
























2 


6 






v.£\o.o.oe 


























2 


7 






R\o.0A$ 


•* 
























2 


e 






A\o.'tf# 


tf 
























2 


9 






.u\o.OM7 


, -^£>c /Ja/cj 


Vf£TK 






















3 









. .R\OJJ& 


























( 3 


( 1 






. /j\oj,36 


Ki>£i+y 


i 
















< 




Cc 


ndi 


tio 


rial 


st< 


>p Code 


Icil Carriage Retu 


rn 



Royal M c Bee Corporation 



Jote No. 



-ProgvNo- 



yy ,, LGP-30 CODING SHEET 



Paqe. 



4—o<_jL 



.Ck'd. by. 



DcteJLlZfj^^ 



Preb 


Inm 


MrfTX/X //\/ <S£AS /#*/ 








Program Input 
Codes 


a 

£ Location 

w 


Instruction 
Op. Address 


g- Contents of 
S Address 


Notes 




1 


1 












> y\ 






0.1 .3 ,2 


. . y'j./sf 










3 3 


. . JA0././J 


, J)Gi-Ay 








3 4 


. .XZ'f.VPA 




£<3>Jf 






3 5 


. , Jt(eooo) 


■K 


£ (A7o yv a ] 






3 6 


. . ^J0./.0/ 


, /<£><£<? 


_/ 






3 7 


. . y\oj/t? 










3 8 


1, .J yc. . ,1 , L..,r. .1 _ 


> MCtfe-r/v^-t 


/k-/) 






3 9 


, . ff./.^A 


• ^ -^y^xr 


Tzx^si 






4 


. . /^J0 0^i 










4 1 


. , S\o./.o$ 


■ / <& <& 








4 2 


, . P\OJA( 


, jt> <r^y 








4 3 


. . Ao./.oZ 


^ / <2>A9 








4 4 


. , i>\as.ws 


D^^^y 




f 




4 5 


. . v'^././V 






1 

I 




4 6 


. , .rj^/^y 


/v-t/ 








4 7 


. . p\O.J3Ps ■ 


53 2>^*y 




L.c 


\0P\O.op4f ' 


4 8 


f ! ) , 




/K 


j J 




4 9 


r. . . ! , , .) 




CoV-r^'Z. 


i 




5 


J.OtO.aao.o.o • 




/ ®1 


i 




5 1 


¥>aaO\C.o.o*. , 


% 


£/f£ 


! 




5 2 


. . fif././J < 










5 3 


. . D\ojJ3 • 


-> i>£> /^t-v 


tT/Jf/? 






5 4 


. . 4^°^' 


> 




i 




5 S 


. . .(/J1&.0.00) . 


X 5 -««.<? 


' 


' 




5 6 


. . .rifop.oSi , 


^7/ 


. r 


{ 




5 7 


. . .Cfep.op) , 


/W4/-/ 








5 8 


. *£fppe ■ 










5 9 


. . £pj?t> > 


* 








6 


. . .uso.oy.o . 


-> i>£> /4 


H/OTri-£/?l 






; .6.! 


7 ..!...). 




/vy/ 






. x«. ?.].-■ .^jfiPfiP.. ' 


*T7. 77 


/<^ /^ 


L<5 / 


fytf x 2.y-c~ ' 


1 6 3 00 KZ\0000 , 

V A 11 11 1 I 1 - -J J J 


Z* /Ctf/r ^2</, <? 



Conditional Stop Code 



Carriage Return 



Royal M c Bee Corporation 



